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iinclude "AT/hybrid . h" 



tpragma atl name " SAMPLE " 

#pragma atl socket "SSOC M 
#pragma atl proc PI ( ARG1 , ARG2 { 2 ) ) 
WRITE " ARG 1 = " / ARG 1 , / 
WRITE " ARG2 = " , ARG 2 , / 



>' 



int test^main ( void) 
{ 

int idata; 

struct atreal rdata [2] ; 

if (ATL_init2 (EM_ATL) != 0){ 
AT_perror ( "ATL_init2 { ) " ) ; 
exit(l); 

} 

idata = 1 ; 

AT_strtorm(rdata, 2, "0.5V", "1.2V"); 

if (ATL_proc (EM_ATL, "PI", INTE (& idata ) , DREAL (rdata, 2)) != 0){ 
AT_perror ( "P2" ) ; 
exit(l); 

} 

return ( 0 ) ; 
} 
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